5 REM" **** CREATED BY GRAEME BENNETT **** 10 [153]"LOAD BASIC LOADER FOR THE OPTIMIZER DOUBLE-SIZE CHARACTER SET 15 PRINT" TO USE: TYPE THE LETTER, THEN THE SHIFTED CHARACTER. MOVE 20 [153]" THE CURSOR DOWN TO THE NEXT LINE, (LOWER LEFT) AND TYPE 'RVS ON' 25 PRINT" REPEAT STEPS 1 & 2. FOR EXAMPLE, A LETTER 'A' WILL HAVE THIS SHAPE: 30 [153]" AATN AATNWAIT" 35 [153]" HIT ANY KEY TO BEGIN READING DATA WAIT" 40 [161]A$:[139]A$[178]""[167]40 45 [153]"LOAD ONE MOMENT, PLEASE" 47 [151]52,48:[151]56,48:[156] 50 [129]A[178]12288[164]14335:[135]D:[151]A,D:[130] 55 [153]"LOADTO ENABLE THE OPTIMIZER SET, HIT RETURN " 60 [153]" O(null)P(null)T(null)IMN(null)IZ(null)EVALR(null) O(null)P(null)T(null)IMN(null)IZ(null)EVALR(null)WAIT" 90 [153]"POKE 53272,(PEEK(53272)AND240)+12":[153]"ONONON CMDCMDCMDCMDCMDCMDCMDCMDCMD" 100 [131]60,102,110,110,96,96,62 101 [131]0,15,7,3,1,0,0 102 [131]15,31,255,255,255,255,0 103 [131]0,255,255,7,31,63,127 104 [131]124,248,248,248,255,255,255 105 [131]255,0,0,248,248,255,255 106 [131]255,255,0,0,255,255,255 107 [131]255,255,255,0,0,255,255 108 [131]7,31,63,127,124,248,248 109 [131]248,248,248,248,248,0,0 110 [131]255,255,126,126,126,126,0 111 [131]0,126,126,63,63,63,63 112 [131]0,0,63,63,248,248,248 113 [131]249,3,7,255,255,252,252 114 [131]252,252,0,0,252,252,255 115 [131]255,255,255,0,0,248,248 116 [131]255,255,255,255,0,0,62 117 [131]62,15,7,1,0,62,124 118 [131]248,248,255,255,255,255,0 119 [131]0,255,255,7,31,63,127 120 [131]124,248,248,248,255,255,255 121 [131]255,0,0,255,255,15,7 122 [131]1,0,0,0,0,0,255 123 [131]255,255,255,0,0,124,124 124 [131]248,248,252,126,127,63,31 125 [131]7,248,248,124,124,62,62 126 [131]31,31,252,252,252,254,127 127 [131]127,63,31,248,248,124,124 128 [131]62,63,31,31,248,248,124 129 [131]124,62,62,31,31,255,255 130 [131]255,255,0,0,1,3,60 131 [131]48,48,48,48,48,60,0 132 [131]14,16,48,254,48,96,255 133 [131]0,60,12,12,12,12,12 134 [131]60,0,0,24,60,126,24 135 [131]24,24,24,0,16,48,127 136 [131]127,48,16,0,0,0,0 137 [131]0,0,0,0,0,192,192 138 [131]192,192,0,0,192,192,252 139 [131]254,255,255,0,0,63,126 140 [131]252,254,255,255,0,0,255 141 [131]254,124,248,240,224,192,128 142 [131]255,255,254,254,254,254,0 143 [131]0,254,255,224,192,128,0 144 [131]0,0,62,31,255,255,255 145 [131]254,0,0,248,240,252,254 146 [131]255,255,63,63,255,254,240 147 [131]248,252,254,63,31,31,31 148 [131]0,102,60,255,60,102,0 149 [131]0,0,24,24,126,24,24 150 [131]0,0,0,0,0,0,0 151 [131]24,24,48,0,0,0,126 152 [131]0,0,0,0,0,0,0 153 [131]0,0,24,24,0,0,3 154 [131]6,12,24,48,96,0,7 155 [131]31,63,127,124,248,248,248 156 [131]31,63,127,255,0,0,63 157 [131]63,7,31,31,15,4,0 158 [131]0,0,127,127,127,127,0 159 [131]0,127,127,0,0,1,3 160 [131]7,15,31,63,255,255,255 161 [131]255,0,0,255,255,3,7 162 [131]15,31,62,124,248,248,3 163 [131]7,15,31,62,124,248,248 164 [131]7,31,63,127,124,124,127 165 [131]63,15,31,63,127,252,248 166 [131]248,248,0,0,24,0,0 167 [131]24,0,0,0,0,24,0 168 [131]0,24,24,48,14,24,48 169 [131]96,48,24,14,0,0,0 170 [131]126,0,126,0,0,0,112 171 [131]24,12,6,12,24,112,0 172 [131]60,102,6,12,24,0,24 173 [131]0,0,0,0,255,255,0 174 [131]0,0,128,192,192,224,224 175 [131]240,240,248,252,254,255,255 176 [131]63,63,255,254,254,254,254 177 [131]254,0,0,0,0,248,252 178 [131]254,255,63,31,31,31,254 179 [131]254,254,254,0,0,254,254 180 [131]254,254,254,254,0,0,254 181 [131]254,254,254,254,254,0,0 182 [131]254,254,62,62,62,62,0 183 [131]0,254,254,192,192,192,192 184 [131]192,0,0,192,31,31,31 185 [131]31,0,0,31,31,31,62 186 [131]124,248,0,0,192,224,0 187 [131]0,0,0,0,0,0,0 188 [131]248,252,254,255,63,31,31 189 [131]31,248,252,254,255,63,31 190 [131]31,31,224,248,252,254,62 191 [131]31,31,31,252,254,255,255 192 [131]63,63,255,254,224,248,252 193 [131]254,62,31,31,31,252,254 194 [131]255,255,63,63,255,254,192 195 [131]224,240,248,124,62,31,31 196 [131]255,255,255,255,0,0,0 197 [131]0,31,31,31,31,0,0 198 [131]31,31,31,31,62,62,124 199 [131]248,248,240,31,31,31,31 200 [131]0,0,31,31,31,31,62 201 [131]62,124,248,248,248,31,31 202 [131]31,15,128,192,255,255,255 203 [131]255,255,254,0,0,248,240 204 [131]24,24,24,255,255,24,24 205 [131]24,192,192,48,48,192,192 206 [131]48,48,24,24,24,24,24 207 [131]24,24,24,0,0,3,62 208 [131]118,54,54,0,255,127,63 209 [131]31,15,7,3,1,0,0 210 [131]0,0,0,0,0,0,240 211 [131]240,240,240,240,240,240,240 212 [131]0,0,0,0,255,255,255 213 [131]255,255,255,0,0,0,0 214 [131]0,0,0,0,0,0,0 215 [131]0,0,255,192,192,192,192 216 [131]192,192,192,192,204,204,51 217 [131]51,204,204,51,51,3,3 218 [131]3,3,3,3,3,3,0 219 [131]0,0,0,204,204,51,51 220 [131]255,254,252,248,240,224,192 221 [131]128,3,3,3,3,3,3 222 [131]3,3,24,24,24,31,31 223 [131]24,24,24,0,0,0,0 224 [131]15,15,15,15,24,24,24 225 [131]31,31,0,0,0,0,0 226 [131]0,248,248,24,24,24,0 227 [131]0,0,0,0,0,255,255 228 [131]225,250,252,254,62,63,95 229 [131]159,192,192,192,192,0,0 230 [131]192,192,252,254,255,255,0 231 [131]0,63,126,252,254,255,255 232 [131]0,0,255,254,224,192,128 233 [131]0,0,0,255,255,254,254 234 [131]254,254,0,0,248,254,224 235 [131]192,128,0,0,62,31,31 236 [131]255,255,255,254,0,0,248 237 [131]240,252,254,255,255,63,63 238 [131]255,254,0,0,0,0,0 239 [131]255,255,255,3,3,3,3 240 [131]3,3,255,255,0,0,0 241 [131]0,240,240,240,240,15,15 242 [131]15,15,0,0,0,0,24 243 [131]24,24,248,248,0,0,0 244 [131]240,240,240,240,0,0,0 245 [131]0,240,240,240,240,15,15 246 [131]15,15,195,153,145,145,159 247 [131]159,193,255,62,62,124,124 248 [131]255,255,255,255,255,255,0 249 [131]0,255,255,255,255,248,248 250 [131]248,124,127,63,31,7,248 251 [131]248,248,248,255,255,255,255 252 [131]255,255,248,248,255,255,255 253 [131]255,255,255,248,248,248,248 254 [131]248,248,248,248,248,124,127 255 [131]63,31,7,255,255,248,248 256 [131]248,248,248,248,126,126,126 257 [131]126,126,126,126,126,0,0 258 [131]0,3,127,127,127,126,255 259 [131]255,251,249,248,248,248,248 260 [131]248,248,248,248,255,255,255 261 [131]255,248,248,248,248,248,248 262 [131]248,248,62,62,62,62,62 263 [131]62,62,62,248,248,248,124 264 [131]127,63,31,7,255,255,248 265 [131]248,248,248,248,248,248,248 266 [131]248,124,62,0,3,7,255 267 [131]255,0,0,0,0,0,0 268 [131]0,0,0,3,127,127,127 269 [131]126,124,124,124,126,127,63 270 [131]31,15,248,248,248,124,127 271 [131]63,31,7,15,15,7,7 272 [131]3,3,1,1,249,249,248 273 [131]252,255,127,63,31,15,15 274 [131]62,62,124,124,248,248,255 275 [131]126,126,126,126,126,126,126 276 [131]7,15,31,63,127,255,255 277 [131]255,195,207,207,207,207,207 278 [131]195,255,241,239,207,1,207 279 [131]159,0,255,195,243,243,243 280 [131]243,243,195,255,255,231,195 281 [131]129,231,231,231,231,255,239 282 [131]207,128,128,207,239,255,31 283 [131]31,31,62,254,252,248,224 284 [131]192,192,192,192,192,192,192 285 [131]192,62,124,248,240,255,255 286 [131]255,255,254,255,63,63,255 287 [131]254,252,240,255,255,0,0 288 [131]248,248,248,248,254,255,63 289 [131]63,255,254,252,240,31,31 290 [131]31,63,254,252,248,240,124 291 [131]248,240,240,224,224,192,192 292 [131]254,255,63,63,255,254,252 293 [131]240,31,62,124,120,240,224 294 [131]192,128,255,153,195,0,195 295 [131]153,255,255,255,231,231,129 296 [131]231,231,255,255,255,255,255 297 [131]255,255,231,231,207,255,255 298 [131]255,129,255,255,255,255,255 299 [131]255,255,255,255,231,231,255 300 [131]255,252,249,243,231,207,159 301 [131]255,248,249,250,124,127,63 302 [131]95,135,62,62,62,62,62 303 [131]62,62,62,7,15,31,63 304 [131]127,255,255,255,255,255,0 305 [131]0,255,255,255,255,127,255 306 [131]0,0,0,0,0,0,255 307 [131]255,0,0,255,255,255,255 308 [131]248,248,248,252,127,63,31 309 [131]15,248,248,248,124,127,63 310 [131]31,15,252,248,248,252,255 311 [131]127,63,31,248,124,0,0 312 [131]0,1,3,7,255,255,231 313 [131]255,255,231,255,255,255,255 314 [131]231,255,255,231,231,207,241 315 [131]231,207,159,207,231,241,255 316 [131]255,255,129,255,129,255,255 317 [131]255,143,231,243,249,243,231 318 [131]143,255,195,153,249,243,231 319 [131]255,231,255,254,252,0,0 320 [131]0,0,0,0,248,248,124 321 [131]124,254,254,255,255,254,255 322 [131]63,63,255,254,252,240,0 323 [131]0,0,0,255,255,255,255 324 [131]31,31,31,62,254,252,248 325 [131]224,254,254,0,0,254,254 326 [131]254,254,254,254,0,0,0 327 [131]0,0,0,255,255,0,0 328 [131]254,252,248,224,254,254,62 329 [131]62,62,62,62,62,192,192 330 [131]192,192,192,192,192,192,31 331 [131]31,31,62,254,252,248,224 332 [131]224,224,240,248,252,126,63 333 [131]31,0,0,0,0,254,254 334 [131]254,254,31,31,31,31,31 335 [131]31,31,31,124,124,124,124 336 [131]124,124,124,124,31,31,31 337 [131]62,254,252,248,224,254,252 338 [131]0,0,0,0,0,0,31 339 [131]31,31,62,126,252,248,224 340 [131]254,252,126,63,31,31,31 341 [131]31,62,31,31,62,254,252 342 [131]248,224,0,0,0,0,255 343 [131]255,255,255,31,31,31,62 344 [131]254,252,248,224,248,248,240 345 [131]240,224,224,192,192,159,159 346 [131]159,62,254,252,248,224,224 347 [131]224,240,248,252,126,63,31 348 [131]224,192,192,192,192,192,192 349 [131]192,224,192,128,0,254,254 350 [131]254,254,231,231,231,0,0 351 [131]231,231,231,63,63,207,207 352 [131]63,63,207,207,231,231,231 353 [131]231,231,231,231,231,255,255 354 [131]252,193,137,201,201,255,0 355 [131]128,192,224,240,248,252,254 356 [131]255,255,255,255,255,255,255 357 [131]255,15,15,15,15,15,15 358 [131]15,15,255,255,255,255,0 359 [131]0,0,0,0,0,255,255 360 [131]255,255,255,255,255,255,255 361 [131]255,255,255,0,0,63,63 362 [131]63,63,63,63,63,63,51 363 [131]51,204,204,51,51,204,204 364 [131]252,252,252,252,252,252,252 365 [131]252,255,255,255,255,51,51 366 [131]204,204,0,1,3,7,15 367 [131]31,63,127,252,252,252,252 368 [131]252,252,252,252,231,231,231 369 [131]224,224,231,231,231,255,255 370 [131]255,255,240,240,240,240,231 371 [131]231,231,224,224,255,255,255 372 [131]255,255,255,7,7,231,231 373 [131]231,255,255,255,255,255,255 374 [131]0,0,31,31,31,62,254 375 [131]252,248,224,192,192,192,192 376 [131]192,192,192,192,62,124,248 377 [131]240,255,255,255,255,254,255 378 [131]63,63,255,254,252,240,255 379 [131]255,255,0,0,248,248,248 380 [131]31,31,31,31,31,31,31 381 [131]31,62,31,31,63,255,254 382 [131]252,240,62,31,31,63,254 383 [131]252,248,224,0,0,0,255 384 [131]255,255,255,255,255,255,255 385 [131]255,255,0,0,0,252,252 386 [131]252,252,252,252,0,0,255 387 [131]255,255,255,15,15,15,15 388 [131]240,240,240,240,255,255,255 389 [131]255,231,231,231,7,7,255 390 [131]255,255,255,0,0,0,0 391 [131]255,255,255,0,0,0,0 392 [131]0,0,0,0,0,0,0 395 [128] 400 [143]*DATA WRITER* 410 [133]"START LINE # CMDCMDCMD";S$:[139]S$[178]" "[167]410 420 [133]"STEP CMDCMDCMD";T$:[139]T$[178]" "[167]420 430 [133]"START ADDRESS (DECIMAL) CMDCMDCMD";B$:[139]B$[178]" "[167]430 440 [133]"END ADDRESS (DECIMAL) CMDCMDCMD";E$:[139]E$[178]" "[167]440 450 S[178][197](S$):T[178][197](T$):B[178][197](B$):E[178][197](E$):F[178]B:L[178]F[170]6:[153]"" 460 [151]831,[181](E[173]256) 470 [151]832,E[171][181](E[173]256)[172]256 480 [151]828,T:[137]570 490 T[178][194](828) 500 S[178][194](826)[172]256[170][194](827) 510 L[178][194](829)[172]256[170][194](830) 520 E[178][194](831)[172]256[170][194](832) 530 [139]L[177][178]E[167]680 550 F[178]L[170]1:L[178]L[170]7 560 [153]"ON " 570 [153]S; 580 [153]"DATA"; 590 [129]P[178]F[164]L:[153][202]([196]([194](P)),2);",";:[130]P 600 [153]"CMD " 610 [153]"GOTO490ONONONON" 620 [151]198,2:[151]631,13:[151]632,13 630 S[178]S[170]T 640 [151]826,[181](S[173]256) 650 [151]827,S[171][181](S[173]256)[172]256 660 [151]829,[181](L[173]256) 670 [151]830,L[171][181](L[173]256)[172]256:[128] 680 [128] 690 [172] LINES 400[171]680 ARE AN AU[164]MATIC [131] WRITING PROGRAM 700 [172] FROM COMMOD[176]E COMPUTING,[181]L. UN[129]TUNATELY, THEIR [176]IGINAL 710 [172] DIDN'T ENTER THE [131] PROPERLY THIS VERSION WRITES ITSELF!!